Информатика, опубликовано 2018-08-22 23:52:21 by Гость
Напишите на языке Паскаля!!!С клавиатуры вводится числа пока не введётся 0;посчитать кол-во чисел оканчивающихся на 7.
Ответ оставил Гость
На языке Блеза Паскаля, французского философа и математика:
var n:integer; count:integer;
begin
repeat
writeln(Tapez les numéros: );
readln(n);
if n mod 10 = 7 then count:=count+1;
until n=0;
writeln(count, se terminant "7");
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на