Регистрация
ksusha00008
05.04.2023 07:06
Информатика
Есть ответ 👍

Перевести программу, написанную на паскаль на язык программирования кумир program zz1;

var s, n, k, p:integer;
begin
write(' введите натуральное число ');
read(n);
k:=n mod 10;
s:=k;
n:=n div 10;
repeat
k:=n mod 10;
if k = s then p:=1;
s:=k;
n:=n div 10;
until n=0;
if p = 1
then writeln(' Верно ')
else writeln(' Неверно ');
end.

244
272
Посмотреть ответы 1

Ответы на вопрос:

Hdhfr
Hdhfr
4,8(82 оценок)

ответ:

(1000+192)÷1  024=1,1640625кбайт

Популярно: Информатика