1.: Составить программу. Ввести 2 числа. Вычесть из большего меньшее.
Ещё составить блок-схему!
____________________________
2. Составить блок-схему и программу. Условие задачи: Если хотя бы одно из трёх введенных пользователем чисел чётно, вывести слово "да". Иначе - вывести слово "нет".
____________________________
3. Исправить все ошибки в данном фрагменте программы:
If a>=10 and a<=99 Then
Writeln (a ‘ двузначное число ’);
Writeln (‘ его квадрат = ’, Sqrt(a));
___________
Решите пожалуйста что сможете!
program z1;
var a,b,c:integer;
begin
write(a=);readln(a);
write(b=);readln(b);
if a>b then c:=a-b else c:=b-a;
writeln(c=,c);
end.
program z2;
var a,b,c:integer;
begin
write(a=);readln(a);
write(b=);readln(b);
write(c=);readln(c);
if ((a mod 2)=0)or((b mod 2)=0)or((c mod 2)=0)then writeln(четное) else writeln(нечетное);
end.
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
