Регистрация
МаКсИк009
Есть ответ 👍

Немецкий язык перевести текст. Без переводчиков

299
316
Посмотреть ответы 1

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

barmin2001g
barmin2001g
4,4(50 оценок)
Var   a         :   array [1..100] of longint;   sum,i : longint; begin sum: =0; for i: =1 to 13 do begin readln(a[i]); sum: =sum+a[i]; end; if sum> 15   then writeln('много')   else writeln('мало'); end.

Популярно: Немецкий язык