Var s,k: integer;
Begin
s := 0;
for k := 4 to 8 do
s := s+6;
writeln(s);
End.
Объясните как решается, либо я не понимаю
Ответы
Ответ дал:
4
Написал пояснение к каждой строке
Var s,k: integer;
Begin
s := 0; // Зануляем S
for k := 4 to 8 do // Цикл от 4 до 8
s := s+6; // Происходит подсчёт заданных чисел из цикла
writeln(s); // Вывод ответа
End.
Var s,k: integer;
Begin
s := 0; // Зануляем S
for k := 4 to 8 do // Цикл от 4 до 8
s := s+6; // Происходит подсчёт заданных чисел из цикла
writeln(s); // Вывод ответа
End.
denistixan:
А решение можно?
следующей программы. Текст программы приведён на трёх языках
программирования.
Вас заинтересует
5 месяцев назад
1 год назад
2 года назад
2 года назад