Напишите программу для вычисления суммы трёх слагаемых
Ответы на вопрос
Ответил Аноним
0
var a,b,c,s: integer;
begin
write('Введите первое слагаемое: ');
readln(a);
write('Введите второе слагаемое: ');
readln(b);
write('Введите третье слагаемое: ');
readln(c);
s:=a+b+c;
write(a,'+',b,'+',c,'=',s);
end.
begin
write('Введите первое слагаемое: ');
readln(a);
write('Введите второе слагаемое: ');
readln(b);
write('Введите третье слагаемое: ');
readln(c);
s:=a+b+c;
write(a,'+',b,'+',c,'=',s);
end.
Приложения:

Ответил kattya100
0
Спасибо
Ответил LessonAssistant
0
Program Mat;
var a,b: integer;
begin
write ('Напишите числа, которые хотите сложить: ')
read (a,b);
writeln ('Сумма этих чисел равна ', (a+b));
end.
var a,b: integer;
begin
write ('Напишите числа, которые хотите сложить: ')
read (a,b);
writeln ('Сумма этих чисел равна ', (a+b));
end.
Приложения:

Новые вопросы
Українська мова,
2 года назад
Химия,
8 лет назад
Математика,
8 лет назад
Математика,
9 лет назад
Математика,
9 лет назад