Введите переменную с ,если переменная в=10. если с больше выводите их сумму ,иначе выводите удвоенное произведение.

Айым200411 Айым200411    2   28.05.2019 12:50    1

Ответы
Lqoki11 Lqoki11  01.10.2020 13:30
Uses crt;
const b=10;
var c:integer;
begin
read(c);
if c>b then writeln(c+b)
else writeln(2*c*b);
end.
ПОКАЗАТЬ ОТВЕТЫ
girrrrl girrrrl  01.10.2020 13:30
Program kkk;
var c,b,q:integer;
begin
writeln('vvedite c');
readln(c);
b:=10;
if c>b then q:=c+b
else
q:=sqr(c*b);
writeln('q=',q);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика