Регистрация
какм1
01.05.2021 03:21
Информатика
Есть ответ 👍

Сделать кто лишний и почему? рошал е.л, касперский е.в, шура-бура м.р, королев л.н, торвальдс л.б

105
242
Посмотреть ответы 2

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

Messi294
Messi294
4,6(11 оценок)
Все эти люди программисты в россии,  кроме торвальдс л.б. -он американский программист .
rano09
rano09
4,6(47 оценок)

Pascal:

var a,b,i:integer;

begin

   write('Введите а: '); readln(a);

   if a < 1 then write('Число не может быть меньше единицы')

   else begin

       for i:=1 to a do begin

           b:=b+i;

       end;

       write('b = ', b);

   end;

end.

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