Что выведут данные программы? a) var a,b,c:integer;
begin
a:=1 + 11 div 3;
b:=2 + 18 mod 3;
c:=2.1 + 14 mod 4;
writeln(a,' ',b,' ',c)
end.
b) var a,b,c:integer;
begin
a:=trunc (2.71);
b:=12*a div 7;
c:=a*b div 4;
writeln(a:4,' ',b,' ',c:4)
end.
c) var k:integer;
begin
k:=371 mod 18 div 4 mod 3*2;
write(k);
end.
a) Будет выведена ошибка компиляции, из за того, что "с" у нас объявлено integer (целое). Но мы пытаемся этому числу присвоить дробное (c:=2.1 + 14 mod 4;). Либо уберите дробь из выражения или измените тип данных для "с"
b) 2 3 1
c) 4