РЕБЯЯТТТТ!!!!! ХЕЛП!!!! ДАЮ 100 БАЛЛОВ!!! Пж
РЕБЯЯТТТТ!!!!! ХЕЛП!!!! ДАЮ 100 БАЛЛОВ!!! Пж
Задать свой вопрос3)
program abc;
var
a, b, c: integer;
begin
writeln('Введите числа а и b');
read(a, b);
if alt;b then
c:=a+5*b
else
c:=2*a-b;
writeln(c);
end.
4)
1) Результат 40
2) Итог 42
5)
var
s: byte;
begin
writeln('Введите число ');
read(s);
case s of
1: writeln('Один');
2: writeln('Два');
3: writeln('Три');
4: writeln('Четыре');
5: writeln('Пять');
6: writeln('Шесть');
7: writeln('Семь');
8: writeln('Восемь');
9: writeln('Девять');
else
writeln('Введите однозначное число');
end;
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Разные вопросы.
Математика.
Русский язык.
Русский язык.
Разные вопросы.
Қазақ тiлi.
Английский язык.
Математика.
История.