Предмет: Информатика,
автор: valentina2251
Программирование паскаль. Даны два целых числа а,в. Если в меньше 50, то Найдите их произведение и разность. СРОЧНО!!!!
Ответы
Автор ответа:
1
Ответ:
Var a, b, c, d : Integer;
Begin
Write("Vvedite a:"); Readln(a);
Write("Vvedite b:"); Readln(b);
if b < 50 then
begin
c := a * b;
d := a - b;
end;
Writeln("Proizvedeniye ravno", c);
Writeln("Raznosty ravna", d);
readln();
end.
Объяснение:
Я смог помочь?!
Похожие вопросы
Предмет: Русский язык,
автор: lblagivis
Предмет: Русский язык,
автор: alisakgjkxjhc
Предмет: Русский язык,
автор: leraru46
Предмет: Биология,
автор: zhamillia