2 информационной моделью Земли
Program pokypka;
var s,os,v1,v2,v3:integer;
begin
writeln('Введите имеющуюся сумму');
readln(s);
writeln('Введите цену первой вещи');
readln(v1);
writeln('Введите цену второй вещи ');
readln(v2);
writeln('Введите цену третьей вещи');
readln(v3);
os:=s-v1-v2-v3;
writeln('Остаток денег=',os)
end.
Var a S:integer;
begin
readln(a);
S:=6*a*a;
writeln(S);
end.
Вроде так
<span>https </span>:// <span>obr.ru </span> / <span>math.doc
</span>Ответ: ЖДАВБЕГ
Задача на логику, простая же, зачем тут выкладывать?
Ложно высказывание для имени Вера, потому что оно не подходит под обе части высказывания.