Цитирай Първоначално написано от wertyusa-f
1.
dim h, r,pi,S as single
Input "h=",h
Input "r=", r
input"pi=", pi (въвежда се 3.14)
S=2*pi*r*h
Print "S=", S


2.
DIM x as integer
Input "x=",x
If x mod 2 = 0 then
Print "4isloto e 4etno"
end if


3, не мога да се досетя...
Дано решените 2 са така..аз не знам вие как ги решавате, блок-схемно или на qbasic зависи..Не съм много убедена, но пак е вариант.
А тези на какъв език са?