1) Запишите программу на языке паскаль для ввода пяти любых целых чисел с клавиатуры
2) Запишите программу на языке паскаль для вывода суммы всех цифр на экран
Ответы на вопрос
Ответил Toppchek
0
Ответ:
Var A, B, C, D, E, SUM: Integer;
begin
Write ('Первое слагаемое: ') ;
Readln (A) ;
Write ('Второе слагаемое: ') ;
Readln (B) ;
Write ('Третье слагаемое: ') ;
Readln (C) ;
Write ('Четвертое слагаемое: ') ;
Readln (D) ;
Write ('Пятое слагаемое: ') ;
Readln (E) ;
SUM := A+B+C+D+E;
Writeln (SUM);
readln;
end.
eckrs19:
а где 2 программа
2 в 1 программе. Просто убери несколько строчек из одной и получишь 2 разные программы
тогда заменить строчку Writeln (SUM); на Writeln (A, B, C, D, E);
Новые вопросы