program number7;
uses crt;
var A: integer;
begin
clrscr;
A:=(116 div 10)*(116 mod 15) div 2 +116 mod 6;
writeln('a=',A);
end.
a=62, div 10 - делит число на 10 и выделяет целую часть, mod 15 - делит число на 15 и выделяет остаток от деления , div 2 - делит число на 2 и выделяет целую часть, mod 6 - делит число на 6 и выделяет остаток
3 мб = 3072 кб
4096 - 3072 = 1024 кб
Program ghg;
var a,b,s:integer;
begin
writeln('vvedite a');
readln(a);
writeln('vvedite b');
readln(b);
if (a<=2*109) and (b<=2*109) then
s:=a+b;
writeln('s=',s);
end.
Ответ:
Объяснение:
За первые трое суток первая поднимется на 60см, вторая на 75см
Далее, на четвертый день
первая улитка достигнет верхушки за 12/50*40 = 9.6 т.е. а 9 часов 36мин вечера
Вторая достигнет ,верхушки за 12/30*25=10 т.е вторая приползет в 10 часов вечера ровно