
Иакинф
4 год назад
вивести число x якщо початкове її значення дорівнює заданому числу а кожне наступне збільшується на 4 поки х не буде перевищувати 30.
ОТВЕТЫ

Иванка
Oct 24, 2020
Снизу
program Programma1;
var A:integer;
begin
readln(A);
while A <= 30 do
begin
write (A, ' ');
A := A + 4;
end;
end.
505