Ввести 3 целых числа и вывести на экран их сумму и произведение. поомогите,объясните...
5-9 класс
|
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.
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.
Другие вопросы из категории
Для всех 4х разрядных чисел найти все симметричные числа,т.е. Числа,у которых первые две цифры и последние две цифры равны
числа. Какое минимальное количество раз необходимо выполнить эту операцию , для того , чтобы числа оказались отсортированы по убыванию.
Читайте также
Ввести три числа,вывести на экран их сумму,произведение и среднее арифметическое.
(В паскале,по такому типу:
Var
Begin
WriteLn
End)
Буду очень благодарна!
составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0.
3. Дана программа на языке Паскаль.
var a,n,s: integer;
begin
s:=0;
n:=0;
repeat;
write('Введите число ');
readln(a);
s:=s+a;
n:=n+1;
until s>100;
writeln('Количество введенных чисел = ' ,n);
end.
Переписать программу используя цикл While.
4. Вывести на экран массив целых чисел, Состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20,60].
Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.
Вводятся три числа. Вывести на экран число с минимальной суммой цифр.
Помогите пожалуйста в Паскале