Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Задание 1.
Газета - Предмет
Чтение - Процесс
Радуга - Явление
Задание 3.
Лишние:
Калькулятор
Задание 4.
Природные системы:
a) Солнечная Система
в) Растение
Извини что нет 2-го задания, не очень понял..
uses crt; var
a,b,c,min: integer; begin writeln('введи три числа: '); readln(a,b,c); min: =a; if b< min then min: =b; if c< min then min: =c; writeln('наименьшее из этих чисел: ',min); end.
program xxx;
var i, x, s : integer;
begin
write('введите число х=');
readln(x);
s: =0
i: =1
while i < =x do
s: =s+i;
i: =i+2
end;
write('сумма нечетных чисел ='; s);
readln
end.
Популярные вопросы