Регистрация
1234567311
26.06.2021 19:02
Информатика
Есть ответ 👍

Рутинные несколько задач, которые нужно решить не написать ответы расписать, Надеюсь на вашу Рутинные несколько задач, которые нужно решить не написать ответы расписать, дам максимум ба">

292
420
Посмотреть ответы 1

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

vihareva08
vihareva08
4,6(85 оценок)
1) var s,i : integer; begin   i: =1; s: =0;   while i< =99 do   begin       s: =s+i;       i: =i+2;   end;   writeln(s); end. 2) begin   writeln((1+99)*50 div 2); end.

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