Паскаль:
var a:integer;begin ReadLn(a); if not (a mod 2 = 0) then WriteLn(a*2); if a > 7 then Writeln(Sqrt(a));end.
var a,b,c,d:integer;
begin
writeln('Напиши дату основания Санкт-Питербурга(день месяц и год)');
writeln('день');
read(a);
writeln('месяц');
read(b);
writeln('год');
read(c);
if (a=27) and (b=5) and (c=1703) then
writeln('Молодец всё правильно')
else
writeln('Ты где то допустил ошибку');
end.
Python:
a = list()
#........заполнение массива..........
for i in range(0, len(a)):
if a[i]%2==0:
a[i]*=2
C++:
#include <iostream>
#include<vector>
using std::cin, std::cout, std::endl;
using std::vector;
int main(){
vector<int> mas;
/*
заполнение массива
*/
for (auto i = mas.begin(); i<mas.end(); ++i)
if(*(i) %2 == 0)
(*(i))*=2;
for (auto var:mas)
cout << var << " ";
return 0;
Монитор - это устройство вывода на экран