1)var n:longint; begin readln(n); if n mod 5=0 then writeln('Число N является кратным чилслу 5')else writeln('Чило N не является кратным числу 5' ); end. 2) var a,b,c:longint: begin readln(a,b,c); if (a+b)div 2=c then writeln('Число C является средним арефметическим чисел A и B') else writeln(' Число C является средним арефметическим чисел A и B') else writeln('Число C не является средним арефметическим чисел A и B '); end. 3) var a:longint; begin write('Сколько вам лет?'); readln(a); if a<14 then write('Вам еще рано получать паспорт?') else write('Поздравляю! Вы гражданин России!'); end. 4) var a:extended; begin readln(a); if (a>36)and(a<37) then writeln('Вы здоровы') else writeln('Вы больны'); end.
Python:
cost = int(input('Cost per 1 kg is\n>>'))
print('Cost for 150g is {}'.format(cost * 0.15))
print('Cost for 300g is {}'.format(cost*0.3))
print('Cost for 3 kg is {}'.format(cost*3))
C++:
#include <iostream>
int main(){
int cost;
std::cout<<"Cost per 1 kg is\n>>";
std::cin>>cost;
std::cout<<"For 150g is "<<cost*0.15<<"\n";
std::cout<<"For 300g is "<<cost*0.3<<"\n";
std::cout<<"For 3 kg is "<<cost*3<<"\n";
return 0;
}