Ввести 3 целых числа и вывести на экран их сумму и произведение. поомогите,
Ответы на вопрос:
var x,y,z: integer;
s: integer;
p: integer;
begin
readln(x,y,z);
s: =x+y+z;
p: =x*y*z;
writeln(s,p)
end.
var {ключевое слово после которого идет объявление переменных} a, b, c, s, p{перечисление названия переменных, которые будут использовться}: integer; {после двоеточия указ тип переменных}begin {начало выполнения программы} write('a = '); {вывод на экран текста и/или переменных (в данном случае выведится "а = ")} readln(a); {считывание переменной а} write('b = '); readln(b); write('c = '); readln(c); s : = a + b + c; {присваивание значение переменной s равной сумме a, b, c} p : = a * b * c; {присваивание значение переменной p равной произведению a, b, c} writeln('сумма равна ', s); {вывод на экрантеста " сумма равна " и значения переменной s} writeln('произведение равно ', p); {вывод на экрантеста " произведение равно " и значения переменной p} readln; {ожидание нажатия клавиши enter}end.
Популярно: Информатика
-
azizplay0726.08.2020 23:27
-
jcgddrMarins09.11.2021 20:19
-
davidbezhasny019.02.2022 12:08
-
osapkina23.03.2020 07:41
-
AndreySolmikov06.08.2020 03:44
-
proshamanfeed04.03.2020 04:39
-
sonyavolkova2613.10.2021 04:38
-
VikaKemer17.01.2023 19:44
-
jeneusbwidbiehsbf27.06.2022 02:45
-
mixakov0520.01.2020 20:01