<span>var
a, b, S, : real;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
s := a * b;
write('Площадь прямоугольника -- ', s, ';
end<span>.</span></span>
Устройства ввода: клавиатура,мышь,микрофон,сканер,веб-камера
Устройства вывода: монитор,наушники,принтер
На паскале
var a, b, c: real; // можно integer
begin
readln (a);
readln (b);
c:=a+b; //или -
writeln (c);
end.
Прикосить напитки, Включать и выключать компьютер! Пользоваться Компьютером можно только с разришеньем Учителя!