Вывести на экран все двузначные числа которые заканчиваются на 1 (паскаль) Срочно!!!!
Вывести на экран все двузначные числа которые заканчиваются на 1 (паскаль) Срочно!!!!
Гость
Ответ(ы) на вопрос:
Гостьprogram gg; var:i,b,c:integer; a:array [1..n] of integer; begin writeln('vvedite chisla'); readln(a); begin for i:=1 to n do begin if ((a[i] mod 10 = 1) and (a[i]<99) and (a[i]>10)) then b:=a[i]; writeln(b); end; end.
Не нашли ответ?
Похожие вопросы