Program abc;
var a,b,c:integer;
begin
write ('Сторона а=');
read(a);
write ('Сторона b=');
read(b);
c:=a*b;
write ('Площадь=',c);
readln;
<span>end.
Вот полностью правильная задача</span>
Можно будет ставить живые обои и они бы поддерживали все игры
Var a,b:integer;
begin
write('Введите число a: ');
readln(a);
write('Введите число b: ');
readln(b);
if (a > b) then
writeln('a больше b')
else if (b > a) then
writeln('b больше a')
else
writeln('a равен b');
end.
#include <stdio.h>
#include <string.h>
void main() {
char a[] = "Award";
if (strstr(a, "w")) {
printf("TRUE");
} else {
printf("FALSE");
}
getchar();
}
Program number;
var c, d,i:integer;
begin
writeln('Введите число');
readln(d);
writeln('Введите сколько раз вывести число');
readln(c);
for i:=1 to c do
write(d,' ');
end.